*********************************************************************** 00050000
*                                                                     * 00100000
*  RMM Inventory Management Extract File Record                       * 00150000
*      DFSORT Symbol mapping                                          * 00200000
*                                                                     * 00250000
*********************************************************************** 00300000
* DFSMS/MVS 1.5.0 DFSMSrmm                                            * 00350000
*                                                                     * 00400000
*PROPRIETARY V3 STATEMENT                                             * 00450000
*LICENSED MATERIALS - PROPERTY OF IBM                                 * 00500000
*"RESTRICTED MATERIALS OF IBM"                                        * 00550000
*5695-DF1                                                             * 00600000
*(C) COPYRIGHT 1993,2000  IBM CORP.                                   * 00650000
*STATUS = HDZ11E0                                                     * 00700000
*END PROPRIETARY V3 STATEMENT                                         * 00750000
*                                                                     * 00800000
*********************************************************************** 00850000
*   SEE "DFSMS/MVS DFSMSrmm IMPLEMENTATION AND CUSTOMIZATION          * 00900000
*     GUIDE (SC26-4932)" FOR FIELD DETAILS ON RMM RECORDS.            * 00950000
*   SEE "DFSORT APG (SC33-4035)" FOR DETAILS OF USING SYMBOLS.        * 01000000
*********************************************************************** 01050000
* CHANGE ACTIVITY:                                                    * 01100000
* $01=K161019,150,000118,CHK: Creating Program name symbols      @01A * 01110002
*********************************************************************** 01200000
  EXTRACT_RDW,1,4,BI                        record descriptor word      01205100
    RDRDW,=,4,BI                                                        01210200
    RKRDW,=,4,BI                                                        01215300
    RORDW,=,4,BI                                                        01220400
    RPRDW,=,4,BI                                                        01225500
    RRRDW,=,4,BI                                                        01230600
    RSRDW,=,4,BI                                                        01235700
    RVRDW,=,4,BI                                                        01240800
    EXTRACT_RDW_LEN,=,2,BI                  record descriptor - length  01245900
      RDRDW_LEN,=,2,BI                                                  01251000
      RKRDW_LEN,=,2,BI                                                  01256100
      RORDW_LEN,=,2,BI                                                  01261200
      RPRDW_LEN,=,2,BI                                                  01266300
      RRRDW_LEN,=,2,BI                                                  01271400
      RSRDW_LEN,=,2,BI                                                  01276500
      RVRDW_LEN,=,2,BI                                                  01281600
    EXTRACT_RDW_SEG,*,2,BI                  record descriptor - segment 01286700
      RDRDW_SEG,=,2,BI                                                  01291800
      RKRDW_SEG,=,2,BI                                                  01296900
      RORDW_SEG,=,2,BI                                                  01302000
      RPRDW_SEG,=,2,BI                                                  01307100
      RRRDW_SEG,=,2,BI                                                  01312200
      RSRDW_SEG,=,2,BI                                                  01317300
      RVRDW_SEG,=,2,BI                                                  01322400
**********************************************************************  01327500
* RMM Extract File records                                           *  01332600
**********************************************************************  01337700
EXTRACT,*,760                                                           01342800
**********************************************************************  01350000
* Common record prefix                                               *  01400000
**********************************************************************  01450000
EXTRACT_PREFIX,=,4                                                      01500000
  EXTRACT_TYPID,=,1,CH                                                  01550000
  RDTYPE,=,1,CH                                                         01556200
  RKTYPE,=,1,CH                                                         01562400
  ROTYPE,=,1,CH                                                         01568600
  RPTYPE,=,1,CH                                                         01574800
  RRTYPE,=,1,CH                                                         01581000
  RSTYPE,=,1,CH                                                         01587200
  RVTYPE,=,1,CH                                                         01593400
    RDTYPEID,'D'          TYPE 'D' - DATA SET RECORD                    01600000
    RKTYPEID,'K'          TYPE 'K' - VRS RECORD                         01650000
    ROTYPEID,'O'          TYPE 'O' - OWNER RECORD                       01700000
    RPTYPEID,'P'          TYPE 'P' - PRODUCT RECORD                     01750000
    RRTYPEID,'R'          TYPE 'R' - RACK RECORD                        01800000
    RSTYPEID,'S'          TYPE 'S' - BIN RECORD                         01850000
    RVTYPEID,'V'          TYPE 'V' - VOLUME RECORD                      01900000
**********************************************************************  01950000
* Start overlay area                                                 *  02000000
**********************************************************************  02050000
EXTRACT_DATA,*                                                          02100000
**********************************************************************  02150000
* RDEXT:    This file maps the information produced for data set     *  02200000
*           records in the RMM report extract file.                  *  02250000
*           In this record the date format depends on the DATEFORM   *  02300000
*           selected by EDGHSKP execution parameter or the parmlib   *  02350000
*           specified value.                                         *  02400000
**********************************************************************  02450000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     02500000
  SKIP,3                RESERVED                                        02550000
  RDDSNAME,*,44,CH      DATA SET NAME                                   02600000
**********************************************************************  02650000
*  Start of common fields:                                           *  02700000
*  The common fields are in the same place in each record type       *  02750000
*  in the report extract file.  This allows common processing of     *  02800000
*  these field across multiple record types.                         *  02850000
**********************************************************************  02900000
  RDCRDATE,*,10,CH      CREATE DATE of data set record                  02950000
  RDCRTIME,*,6,CH       CREATE TIME (HHMMSS) of data set                03000000
  RDCRSID,*,8,CH        CREATE SYSTEM ID of data set record             03050000
  RDLCDATE,*,10,CH      LAST CHANGE DATE of data set record             03100000
  RDLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of data set record    03150000
  RDLCUID,*,8,CH        LAST CHANGE USER ID of data set record          03200000
  RDLCSID,*,8,CH        LAST CHANGE SYSTEM ID of data set record        03250000
**********************************************************************  03300000
*  End of common fields                                              *  03350000
**********************************************************************  03400000
  RDVOLSER,*,6,CH       VOLUME SERIAL NUMBER                            03450000
  RDDSNSEQ,*,4,CH       DATA SET SEQUENCE NUMBER                        03500000
  RDUNITAD,*,4,CH       CREATING DRIVE ADDRESS                          03550000
  RDRECFM,*,4,CH        RECORD FORMAT                                   03600000
  RDVOLSEQ,*,4,CH       VOLUME SEQUENCE NUMBER                          03650000
  RDLRECL,*,6,CH        LOGICAL RECORD LENGTH                           03700000
  RDBLKSZ,*,6,CH        PHYSICAL BLOCK SIZE                             03750000
  RDBLKCNT,*,8,CH       BLOCK COUNT                                     03800000
  RDOWNDSN,*,8,CH       DATA SET OWNER                                  03850000
  RDSECLEV,*,8,CH       SECURITY LEVEL - SHORT                          03900000
  RDSECLNG,*,30,CH      SECURITY LEVEL - LONG                           03950000
  RDCOMP,*,1,CH         COMPACTION USED                                 04000000
    RDYES,'Y'             YES                                           04050000
    RDNO,'N'              NO                                            04100000
  RDLRDDAT,*,10,CH      DATE DATA SET LAST READ                         04150000
  RDLWTDAT,*,10,CH      DATE DATA SET LAST WRITTEN                      04200000
  RDMCNAME,*,8,CH       SMS MANAGEMENT CLASS                            04250000
  RDVRSVAL,*,8,CH       VRS MANAGEMENT VALUE                            04300000
  RDSGNAME,*,8,CH       SMS STORAGE GROUP NAME                          04350000
  RDSCNAME,*,8,CH       SMS STORAGE CLASS NAME                          04400000
  RDDCNAME,*,8,CH       SMS DATA CLASS NAME                             04450000
  RDCRTJBN,*,8,CH       CREATING JOB NAME                               04500000
  RDVRSTYP,*,1,CH       MATCHING VRS TYPE FLAG                          04550000
    RDVD,'D'              DATASET                                       04600000
    RDVS,'S'              SMSMC                                         04650000
    RDVV,'V'              VRSMV                                         04700000
    RDVM,'M'              DATASET AND VRSMV                             04750000
    RDVC,'C'              DATASET AND SMSMC                             04800000
  RDVRSNAM,*,44,CH      MATCHING VRS NAME                               04850000
  RDVRSJBN,*,8,CH       MATCHING VRS JOB NAME MASK                      04900000
  RDRETDAT,*,10,CH      RETENTION DATE                                  04950000
  RDSTEPNM,*,8,CH       CREATING STEP NAME                              05000000
  RDDDNAME,*,8,CH       CREATING DD NAME                                05050000
**********************************************************************  05100000
* RDMDMVID: Is a unique token assigned to every volume and every     *  05150000
*           data set in a multi-volume set.                          *  05200000
**********************************************************************  05250000
  RDMDMVID,*,8,CH       MULTI-DSET MULTI-VOL ID                         05300000
**********************************************************************  05350000
* Data set size:  This is calculated by multiplying the blocksize    *  05400000
*                 by the number of blocks.                           *  05450000
**********************************************************************  05500000
  RDDSSIZE,*,10,CH      APPROX. SIZE OF FILE KBYTES                     05550000
  RDABEND,*,1,CH        DSET CLOSED BY ABEND                            05600000
*   RDYES,'Y'             YES                                           05650000
*   RDNO,'N'              NO                                            05700000
**********************************************************************  05750000
* RDCAT: Set to 'Y' when opened after allocation determines VOLSER   *  05800000
*        by reference to the catalog. Once set to 'Y' it is never    *  05850000
*        changed.                                                    *  05900000
**********************************************************************  05950000
  RDCAT,*,1,CH          DSET USED VIA CATALOG  Y/N                      06000000
*   RDYES,'Y'             YES                                           06050000
*   RDNO,'N'              NO                                            06100000
  RDVRSR,*,1,CH         RETAINED BY VRS                                 06150000
*   RDYES,'Y'             YES                                           06200000
*   RDNO,'N'              NO                                            06250000
  SKIP,3                RESERVED                                        06300000
  RDLABNO,*,4,CH        LABEL NUMBER LABEL=(xx,ll)                      06350000
**********************************************************************  06400000
* Primary VRS subchain name:                                         *  06450000
*                     This is the retaining VRS in the matching      *  06500000
*                     primary VRS chain.  It is set only if retained *  06550000
*                     by a NAME VRS subchain in the primary VRS.     *  06600000
**********************************************************************  06650000
  RDVRSSCH,*,8,CH       Primary VRS subchain NAME                       06700000
  RDVRSXDS,*,10,CH      Primary VRS subchain start date                 06750000
**********************************************************************  06800000
* Retaining Secondary VRS name:                                      *  06850000
*                     Matching vrs name and job name are included    *  06900000
*                     where a secondary VRS also matches.            *  06950000
*                     The retaining VRS subchain NAME in this        *  07000000
*                     matching VRS is set if it is used to retain    *  07050000
*                     the data set.                                  *  07100000
**********************************************************************  07150000
  RD2VNME,*,8,CH        Secondary VRS name mask                         07200000
  RD2VJBN,*,8,CH        Secondary VRS jobname mask                      07250000
  RD2VSCH,*,8,CH        Secondary VRS subchain NAME                     07300000
  RD2VXDS,*,10,CH       Secondary VRS subchain startdate                07350000
  RDTOTAL_BLKCNT,*,10,CH  Total block count across all ds volumes @01A  07360001
  SKIP,3                Reserved                                  @01A  07370003
  RDCPGM,*,8,CH         Creating program name                     @01A  07380001
  RDLPGM,*,8,CH         Last used program name                    @01A  07390001
  RDLJOB,*,8,CH         Last used job name                        @01A  07391001
  RDLSTEP,*,8,CH        Last used step name                       @01A  07392001
  RDLDDNM,*,8,CH        Last used DD name                         @01A  07393001
  RDLDEVN,*,4,CH        Last used device name                     @01A  07394001
**********************************************************************  07400000
* END OF REPORT EXTRACT DATA SET NAME RECORD                         *  07450000
**********************************************************************  07500000
RDRCEND,*               END OF RDEXT                                    07550000
*                                                                       07551300
**********************************************************************  07650000
* RKEXT:    This file maps the information produced for VRS          *  07700000
*           records in the RMM report extract file.                  *  07750000
*           In this record the date format depends on the DATEFORM   *  07800000
*           selected by EDGHSKP execution parameter or the parmlib   *  07850000
*           specified value.                                         *  07900000
**********************************************************************  07950000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     08000000
  RKTYPE2,*,1,CH        VRS TYPE                                        08050000
    RKTYPVOL,'V'          VOLUME VRS                                    08100000
    RKTYPDSN,'D'          DATA SET VRS                                  08150000
    RKTYPNAM,'N'          NAME VRS                                      08200000
  SKIP,1                RESERVED                                        08250000
  RKDSNAME,*,44,CH      DATA SET NAME MASK                              08300000
  RKNAME,=,8,CH         VRS NAME                                        08350000
  RKVOLSER,=,6,CH       VOLUME SERIAL MASK                              08400000
  SKIP,38               RESERVED                                        08450000
  RKGENKEY,*,1,CH       DATA SET/VOLUME MASK                            08500000
    RKYES,'Y'             YES                                           08550000
    RKNO,'N'              NO                                            08600000
**********************************************************************  08650000
*  Start of common fields:                                           *  08700000
*  The common fields are in the same place in each record type       *  08750000
*  in the report extract file.  This allows common processing of     *  08800000
*  these field across multiple record types.                         *  08850000
**********************************************************************  08900000
  RKCRDATE,*,10,CH      CREATE DATE of VRS record                       08950000
  RKCRTIME,*,6,CH       CREATE TIME (HHMMSS) of VRS record              09000000
  RKCRSID,*,8,CH        CREATE SYSTEM ID of VRS record                  09050000
  RKLCDATE,*,10,CH      LAST CHANGE DATE of VRS record                  09100000
  RKLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of VRS record         09150000
  RKLCUID,*,8,CH        LAST CHANGE USER ID of VRS record               09200000
  RKLCSID,*,8,CH        LAST CHANGE SYSTEM ID of VRS record             09250000
**********************************************************************  09300000
*  End of common fields                                              *  09350000
**********************************************************************  09400000
  RKCRTJBN,*,8,CH       JOBNAME MASK                                    09450000
  RKRETNC,*,1,CH        RETAIN BASED ON NUMBER OF CYCLES                09500000
*   RKYES,'Y'             YES                                           09550000
*   RKNO,'N'              NO                                            09600000
  RKRETND,*,1,CH        RETAIN BASED ON NUMBER OF ELAPSED DAYS          09650000
*   RKYES,'Y'             YES                                           09700000
*   RKNO,'N'              NO                                            09750000
  RKRETNR,*,1,CH        RETAIN BASED ON NUMBER OF DAYS UNREFERENCED     09800000
*   RKYES,'Y'             YES                                           09850000
*   RKNO,'N'              NO                                            09900000
  RKRETNW,*,1,CH        RETAIN ONLY WHILE DATA SET IS CATALOGED         09950000
*   RKYES,'Y'             YES                                           10000000
*   RKNO,'N'              NO                                            10050000
  RKRETNX,*,1,CH        RETAIN UNTIL EXPIRED                            10100000
*   RKYES,'Y'             YES                                           10150000
*   RKNO,'N'              NO                                            10200000
  RKRETNXD,*,1,CH       RETAIN BASED ON EXTRA DAYS SINCE VRS MATCHED    10250000
*   RKYES,'Y'             YES                                           10300000
*   RKNO,'N'              NO                                            10350000
  RKRETNCD,*,1,CH       RETAIN BASED ON BYDAYSCYCLE (ALL COPIES ON      10400000
*                          1 DAY ARE TREATED AS A CYCLE)                10450000
*   RKYES,'Y'             YES                                           10500000
*   RKNO,'N'              NO                                            10550000
  RKRETAND,*,1,CH       RETENTION MUST BE ANDED WITH THE NEXT VRS IN    10600000
*                          THE CHAIN                                    10650000
*   RKYES,'Y'             YES                                           10700000
*   RKNO,'N'              NO                                            10750000
  SKIP,5                RESERVED                                        10800000
  RKDSNG,*,1,CH         DATA SET NAME MASK IS FOR A GDG                 10850000
    RKG,'Y'               GDG                                           10900000
    RKPG,'P'              PSEUDO-GDG                                    10950000
    RKNG,'N'              NOGDG                                         11000000
  RKLOCTYP,*,1,CH       LOCATION TYPE                                   11050000
    RKAUT,'A'             AUTO                                          11100000
    RKMAN,'M'             MANUAL                                        11150000
    RKSTR,'S'             STORE                                         11200000
    RKBLK,' '             BLANK                                         11250000
  RKLOC,*,8,CH          NAME OF LOCATION TO BE STORED                   11300000
  RKNEXT,*,8,CH         NAME OF NEXT VRS IN THE CHAIN                   11350000
  RKCOUNT,*,5,CH        VITAL RECORD COUNT (NUMBER OF CYCLES OR         11400000
*                          ELAPSED DAYS OR VOLUMES TO BE KEPT IN TOTAL) 11450000
  RKSTNUM,*,5,CH        STORE KEEP NUMBER (NUMBER OF CYCLES OR DAYS OR  11500000
*                          VOLUMES TO BE KEPT IN STORE)                 11550000
  RKDELAY,*,5,CH        NUMBER OF ELAPSED DAYS DELAY BEFORE BEING       11600000
*                          SELECTED FOR THE FIRST LOCATION              11650000
  RKOWNER,*,8,CH        VITAL RECORD OWNER                              11700000
  RKDELDAT,*,10,CH      DATE THE VRS IS TO BE DELETED BY RMM            11750000
  RKDESC,*,30,CH        DESCRIPTION                                     11800000
  RKRELOPT,*,8,CH       VRS RELEASE OPTIONS                             11850000
  RKRELIXD,=,1,CH       IGNORE EXPDT                                    11900000
*   RKYES,'Y'             YES                                           11950000
*   RKNO,'N'              NO                                            12000000
  RKRELSI,*,1,CH        SCRATCH IMMEDIATE                               12050000
*   RKYES,'Y'             YES                                           12100000
*   RKNO,'N'              NO                                            12150000
  SKIP,6                RESERVED                                        12200000
**********************************************************************  12250000
* END OF REPORT EXTRACT VRS RECORD                                   *  12300000
**********************************************************************  12350000
  RKRCEND,*             END OF RKEXT                                    12400000
*                                                                       12450000
**********************************************************************  12500000
* ROEXT:    This file maps the information produced for owner        *  12550000
*           records in the RMM report extract file.                  *  12600000
*           In this record the date format depends on the DATEFORM   *  12650000
*           selected by EDGHSKP execution parameter or the parmlib   *  12700000
*           specified value.                                         *  12750000
**********************************************************************  12800000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     12850000
  SKIP,3                RESERVED                                        12900000
  ROOWNER,*,8,CH        OWNER ID                                        12950000
  SKIP,36               RESERVED                                        13000000
**********************************************************************  13050000
*  Start of common fields:                                           *  13100000
*  The common fields are in the same place in each record type       *  13150000
*  in the report extract file.  This allows common processing of     *  13200000
*  these field across multiple record types.                         *  13250000
**********************************************************************  13300000
  ROCRDATE,*,10,CH      CREATE DATE of owner record                     13350000
  ROCRTIME,*,6,CH       CREATE TIME (HHMMSS) of owner record            13400000
  ROCRSID,*,8,CH        CREATE SYSTEM ID of owner record                13450000
  ROLCDATE,*,10,CH      LAST CHANGE DATE of owner record                13500000
  ROLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of owner record       13550000
  ROLCUID,*,8,CH        LAST CHANGE USER ID of owner record             13600000
  ROLCSID,*,8,CH        LAST CHANGE SYSTEM ID of owner record           13650000
**********************************************************************  13700000
*  End of common fields                                              *  13750000
**********************************************************************  13800000
  ROOWNSUR,*,20,CH      OWNER LAST NAME                                 13850000
  ROOWNFST,*,20,CH      OWNER FIRST NAME                                13900000
  ROOWNDEP,*,40,CH      OWNER DEPARTMENT                                13950000
  ROOWNAD1,*,40,CH      OWNER ADDRESS LINE 1                            14000000
  ROOWNAD2,*,40,CH      OWNER ADDRESS LINE 2                            14050000
  ROOWNAD3,*,40,CH      OWNER ADDRESS LINE 3                            14100000
  ROOWNTIN,*,8,CH       OWNER INTERNAL TELEPHONE NUMBER                 14150000
  ROOWNTEX,*,20,CH      OWNER EXTERNAL TELEPHONE NUMBER                 14200000
  ROOWNUID,*,8,CH       OWNER ELECTRONIC USERID                         14250000
  ROOWNNOD,*,8,CH       OWNER ELECTRONIC NODE NAME                      14300000
  ROOWNVOL,*,6,CH       TOTAL NUMBER OF OWNED VOLUMES                   14350000
**********************************************************************  14400000
* END OF REPORT EXTRACT OWNER RECORD                                 *  14450000
**********************************************************************  14500000
RORCEND,*             END OF ROEXT                                      14550000
*                                                                       14600000
**********************************************************************  14650000
* RPEXT:    This file maps the information produced for product      *  14700000
*           records in the RMM report extract file.                  *  14750000
*           In this record the date format depends on the DATEFORM   *  14800000
*           selected by EDGHSKP execution parameter or the parmlib   *  14850000
*           specified value.                                         *  14900000
**********************************************************************  14950000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     15000000
  SKIP,3                RESERVED                                        15050000
  RPPPNUM,*,8,CH        PRODUCT NUMBER (NNNN-CCC)                       15100000
  RPVER,*,6,CH          VERSION/RELEASE/MOD NUMBER                      15150000
*                       (vvrrmm) where vv - version, rr - release,      15200000
*                       mm - modification level                         15250000
  SKIP,30               RESERVED                                        15300000
**********************************************************************  15350000
*  Start of common fields:                                           *  15400000
*  The common fields are in the same place in each record type       *  15450000
*  in the report extract file.  This allows common processing of     *  15500000
*  these field across multiple record types.                         *  15550000
**********************************************************************  15600000
  RPCRDATE,*,10,CH      CREATE DATE of product record                   15650000
  RPCRTIME,*,6,CH       CREATE TIME (HHMMSS) of product record          15700000
  RPCRSID,*,8,CH        CREATE SYSTEM ID of product record              15750000
  RPLCDATE,*,10,CH      LAST CHANGE DATE of product record              15800000
  RPLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of product record     15850000
  RPLCUID,*,8,CH        LAST CHANGE USER ID of product record           15900000
  RPLCSID,*,8,CH        LAST CHANGE SYSTEM ID of product record         15950000
**********************************************************************  16000000
*  End of common fields                                              *  16050000
**********************************************************************  16100000
  RPPPOWN,*,8,CH        PRODUCT OWNER ID                                16150000
  RPPPNAME,*,30,CH      PRODUCT NAME                                    16200000
  RPPPDESC,*,30,CH      PRODUCT DESCRIPTION                             16250000
  RPVOLNO,*,4,CH        NUMBER OF PRODUCT VOLUMES                       16300000
**********************************************************************  16350000
* END OF REPORT EXTRACT PRODUCT RECORD                               *  16400000
**********************************************************************  16450000
RPRCEND,*             END OF RPEXT                                      16500000
*                                                                       16550000
**********************************************************************  16600000
* RREXT:    This file maps the information produced for rack number  *  16650000
*           records in the RMM report extract file.                  *  16700000
*           In this record the date format depends on the DATEFORM   *  16750000
*           selected by EDGHSKP execution parameter or the parmlib   *  16800000
*           specified value.                                         *  16850000
**********************************************************************  16900000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     16950000
  RRTYPE2,*,1,CH        RACK RECORD ID                                  17000000
    RRTYPEE,'E'           EMPTY RACK                                    17050000
    RRTYPEF,'F'           FREE/SCRATCH RACK                             17100000
    RRTYPEU,'U'           IN USE RACK                                   17150000
  SKIP,2                RESERVED                                        17200000
  RRRACK,*,6,CH         RACK NUMBER                                     17250000
  RRNAME,*,8,CH         MEDIA NAME                                      17300000
    RRUNIT,=,8,CH       Old name for RRNAME field                       17350000
  SKIP,30               RESERVED                                        17400000
**********************************************************************  17450000
*  Start of common fields:                                           *  17500000
*  The common fields are in the same place in each record type       *  17550000
*  in the report extract file.  This allows common processing of     *  17600000
*  these field across multiple record types.                         *  17650000
**********************************************************************  17700000
  RRCRDATE,*,10,CH      CREATE DATE of rack record                      17750000
  RRCRTIME,*,6,CH       CREATE TIME (HHMMSS) of rack record             17800000
  RRCRSID,*,8,CH        CREATE SYSTEM ID of rack record                 17850000
  RRLCDATE,*,10,CH      LAST CHANGE DATE of rack record                 17900000
  RRLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of rack record        17950000
  RRLCUID,*,8,CH        LAST CHANGE USER ID of rack record              18000000
  RRLCSID,*,8,CH        LAST CHANGE SYSTEM ID of rack record            18050000
**********************************************************************  18100000
*  End of common fields                                              *  18150000
**********************************************************************  18200000
  RRVOLSER,*,6,CH       ASSIGNED VOLUME SERIAL NUMBER                   18250000
**********************************************************************  18300000
* END OF REPORT EXTRACT RACK NUMBER RECORD                           *  18350000
**********************************************************************  18400000
RRRCEND,*               END OF RREXT                                    18450000
*                                                                       18500000
**********************************************************************  18550000
* RSEXT:    This file maps the information produced for bin number   *  18600000
*           records in the RMM report extract file.                  *  18650000
*           In this record the date format depends on the DATEFORM   *  18700000
*           selected by EDGHSKP execution parameter or the parmlib   *  18750000
*           specified value.                                         *  18800000
**********************************************************************  18850000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     18900000
  RSTYPE2,*,1,CH        BIN RECORD ID                                   18950000
    RSTYPER,'E'           EMPTY BIN                                     19000000
    RSTYPES,'U'           ASSIGNED BIN                                  19050000
  RSRMSTID,*,8,CH       STORAGE LOCATION NAME                           19100000
  SKIP,1                RESERVED                                        19150000
  RSBINNO,*,6,CH        BIN NUMBER                                      19200000
  RSBMEDN,*,8,CH        BIN MEDIA NAME                                  19250000
  SKIP,23               RESERVED                                        19300000
**********************************************************************  19350000
*  Start of common fields:                                           *  19400000
*  The common fields are in the same place in each record type       *  19450000
*  in the report extract file.  This allows common processing of     *  19500000
*  these field across multiple record types.                         *  19550000
**********************************************************************  19600000
  RSCRDATE,*,10,CH      CREATE DATE of bin record                       19650000
  RSCRTIME,*,6,CH       CREATE TIME (HHMMSS) of bin record              19700000
  RSCRSID,*,8,CH        CREATE SYSTEM ID of bin record                  19750000
  RSLCDATE,*,10,CH      LAST CHANGE DATE of bin record                  19800000
  RSLCTIME,*,6,CH       LAST CHANGE TIME (HHMMSS) of bin record         19850000
  RSLCUID,*,8,CH        LAST CHANGE USER ID of bin record               19900000
  RSLCSID,*,8,CH        LAST CHANGE SYSTEM ID of bin record             19950000
**********************************************************************  20000000
*  End of common fields                                              *  20050000
**********************************************************************  20100000
  RSVOLSER,*,6,CH       ASSIGNED VOLUME SERIAL NUMBER                   20150000
**********************************************************************  20200000
* END OF REPORT EXTRACT STORAGE LOCATION BIN RECORD                     20250000
**********************************************************************  20300000
RSRCEND,*               END OF RSEXT                                    20350000
*                                                                       20400000
**********************************************************************  20450000
* RVEXT:    This file maps the information produced for volume       *  20500000
*           records in the RMM report extract file.                  *  20550000
*           In this record the date format depends on the DATEFORM   *  20600000
*           selected by EDGHSKP execution parameter or the parmlib   *  20650000
*           specified value.                                         *  20700000
**********************************************************************  20750000
POSITION,EXTRACT_DATA                         start at EXTRACT_DATA     20800000
  SKIP,3                RESERVED                                        20850000
  RVVOLSER,*,6,CH       VOLUME SERIAL NUMBER                            20900000
  RVPVOL,*,6,CH         PREVIOUS VOLUME IN SEQUENCE                     20950000
  RVNVOL,*,6,CH         NEXT VOLUME IN SEQUENCE                         21000000
  SKIP,6                RESERVED                                        21050000
**********************************************************************  21100000
* RVMDMVID: Is a unique token assigned to every volume and every     *  21150000
*           data set in a multi-volume set.                          *  21200000
**********************************************************************  21250000
  RVMDMVID,*,8,CH       MULTI-DSET MULT-VOL ID                          21300000
  SKIP,12               RESERVED                                        21350000
**********************************************************************  21400000
*  Start of common fields:                                           *  21450000
*  The common fields are in the same place in each record type       *  21500000
*  in the report extract file.  This allows common processing of     *  21550000
*  these field across multiple record types.                         *  21600000
**********************************************************************  21650000
  RVCRDATE,*,10,CH      CREATE DATE of volume record                    21700000
  RVCRTIME,*,6,CH       CREATE TIME HHMMSS of volume record             21750000
  RVCRSID,*,8,CH        CREATE SYSTEM ID of volume record               21800000
  RVLCDATE,*,10,CH      LAST CHANGE DATE of volume record               21850000
  RVLCTIME,*,6,CH       LAST CHANGE TIME HHMMSS of volume record        21900000
  RVLCUID,*,8,CH        LAST CHANGE USER ID of volume record            21950000
  RVLCSID,*,8,CH        LAST CHANGE SYSTEM ID of volume record          22000000
**********************************************************************  22050000
*  End of common fields                                              *  22100000
**********************************************************************  22150000
  RVEXPDTO,*,10,CH      EXPIRATION DATE  - original                     22200000
  RVEXPDT,*,10,CH       EXPIRATION DATE  - current                      22250000
  RVDEN,*,4,CH          RECORDING DENSITY                               22300000
  RVCOMP,*,1,CH         COMPACTION USED                                 22350000
    RVYES,'Y'             YES                                           22400000
    RVNO,'N'              NO                                            22450000
  RVDSNNO,*,4,CH        NUMBER OF DATASETS ON VOLUME                    22500000
  RVTUSE,*,10,CH        TAPE USAGE IN KBYTES                            22550000
  RVUSE,*,4,CH          VOLUME USE COUNT                                22600000
  RVLABNO1,*,4,CH       LABEL NO OF FIRST FILE                          22650000
  RVSTORID,*,8,CH       CURRENT LOCATION NAME                           22700000
    RVSHL,'SHELF'         SHELF                                         22750000
    RVLOC,'LOCAL'         LOCAL                                         22800000
    RVREM,'REMOTE'        REMOTE                                        22850000
**  CAN ALSO BE:                                                        22900000
**    DISTANT INSTALLATION DEFINED STORE                                22950000
**    SMS-DEFINED LIBRARY NAME                                          23000000
  RVDEST,*,8,CH         DESTINATION NAME                                23050000
*   RVLOC,'LOCAL'         LOCAL                                         23100000
*   RVREM,'REMOTE'        REMOTE                                        23150000
**  CAN ALSO BE:                                                        23200000
**    DISTANT INSTALLATION DEFINED STORE                                23250000
**    SMS-DEFINED LIBRARY NAME                                          23300000
**********************************************************************  23350000
* Bin Numbers: If a volume is not moving (RVTRANS=N), and is in a    *  23400000
*              storage location, RVSTBIN contains the current bin    *  23450000
*              number and RVOBIN the bin number in the previous      *  23500000
*              location.                                             *  23550000
*              If a volume is moving (RVTRANS=Y), and moving to a    *  23600000
*              storage location, RVSTBIN contains the target bin     *  23650000
*              number and RVOBIN the bin number in the source        *  23700000
*              location.                                             *  23750000
**********************************************************************  23800000
  RVSTBIN,*,6,CH        BIN NUMBER                                      23850000
  RVOBIN,*,6,CH         PREVIOUS BIN NUMBER                             23900000
  RVSTDATE,*,10,CH      MOVEMENT TRACKING DATE                          23950000
  RVRETDAT,*,10,CH      RETENTION DATE CALCULATED BY VRS PROCESSING     24000000
  RVLONLOC,*,8,CH       LOAN LOCATION                                   24050000
  RVOLNLOC,*,8,CH       PREVIOUS LOAN LOCATION                          24100000
  RVLRDDAT,*,10,CH      DATE VOLUME LAST READ                           24150000
  RVLWTDAT,*,10,CH      DATE VOLUME LAST WRITTEN                        24200000
**********************************************************************  24250000
* Assigned date and time:                                            *  24300000
*    These fields are set each time a volume changes either from     *  24350000
*    or to scratch status.                                           *  24400000
**********************************************************************  24450000
  RVASDATE,*,10,CH      ASSIGNED DATE                                   24500000
  RVASTIME,*,6,CH       ASSIGNED TIME HHMMSS                            24550000
  RVOWNID,*,8,CH        VOLUME OWNER USERID                             24600000
  RVCRUID,*,8,CH        CREATING USERID                                 24650000
  RVCRJOB,*,8,CH        CREATING JOBNAME                                24700000
  RVSECLEV,*,8,CH       SECURITY LEVEL - SHORT                          24750000
  RVSECLNG,*,30,CH      SECURITY LEVEL - LONG                           24800000
  RVVOLSEQ,*,4,CH       VOLUME SEQUENCE NUMBER                          24850000
  RVSTATUS,*,8,CH       VOLUME STATUS                                   24900000
    RVMST,'MASTER'        MASTER                                        24950000
    RVUSR,'USER'          USER                                          25000000
    RVSCR,'SCRATCH'       SCRATCH                                       25050000
    RVINI,'INIT'          INIT                                          25100000
    RVENT,'ENTRY'         ENTRY                                         25150000
  RVPENDRS,*,1,CH       VOLUME PENDING RELEASE                          25200000
*   RVYES,'Y'             YES                                           25250000
*   RVNO,'N'              NO                                            25300000
  RVVRS,*,1,CH          VOLUME RETAINED BY VRS                          25350000
*   RVYES,'Y'             YES                                           25400000
*   RVNO,'N'              NO                                            25450000
  RVLOAN,*,1,CH         VOLUME ON LOAN                                  25500000
*   RVYES,'Y'             YES                                           25550000
*   RVNO,'N'              NO                                            25600000
  RVOPEN,*,1,CH         VOLUME IS OPENED                                25650000
*   RVYES,'Y'             YES                                           25700000
*   RVNO,'N'              NO                                            25750000
  RVOCER,*,1,CH         VOLUME RECORDED BY O/C/EOV                      25800000
*   RVYES,'Y'             YES                                           25850000
*   RVNO,'N'              NO                                            25900000
  RVDEFRET,*,1,CH       PARMLIB DEFAULT RETENTION USED TO GENERATE      25950000
*                          THE VOLUME EXPDT                             26000000
*   RVYES,'Y'             YES                                           26050000
*   RVNO,'N'              NO                                            26100000
  RVPPTAPE,*,1,CH       PROGRAM PRODUCT TAPE                            26150000
*   RVYES,'Y'             YES                                           26200000
*   RVNO,'N'              NO                                            26250000
**********************************************************************  26300000
* Labels: The RVLABEL field provides information about what label    *  26350000
*         types may be written on the volume.  If BLP output has     *  26400000
*         been used, the volume may no longer match this             *  26450000
*         information.  Any BLP output beyond file 1 on a volume     *  26500000
*         is not recorded by RMM.                                    *  26550000
**********************************************************************  26600000
  RVLABEL,*,3,CH        LABEL TYPE                                      26650000
    RVSL,'SL'             SL                                            26700000
    RVAL,'AL'             AL                                            26750000
    RVNL,'NL'             NL                                            26800000
    RVSUL,'SUL'           SUL                                           26850000
    RVAUL,'AUL'           AUL                                           26900000
  RVBLP,*,1,CH          VOLUME LAST WRITTEN BLP                         26950000
*   RVYES,'Y'             YES                                           27000000
*   RVNO,'N'              NO                                            27050000
**********************************************************************  27100000
* Release Actions:  The following 5 fields list the actions to be    *  27150000
*              set for the volume when it is released.  These are    *  27200000
*              not the current actions.  See RVACTION for the        *  27250000
*              pending actions.                                      *  27300000
**********************************************************************  27350000
  RVRETS,*,8,CH         RETURN ACTION                                   27400000
    RVOWN,'OWNER'         OWNER                                         27450000
*   RVSCR,'SCRATCH'       SCRATCH                                       27500000
  RVREPL,*,1,CH         REPLACE ON RELEASE                              27550000
*   RVYES,'Y'             YES                                           27600000
*   RVNO,'N'              NO                                            27650000
  RVINIT,*,1,CH         REINITIALISE                                    27700000
*   RVYES,'Y'             YES                                           27750000
*   RVNO,'N'              NO                                            27800000
  RVERASE,*,1,CH        SECURITY ERASE                                  27850000
*   RVYES,'Y'             YES                                           27900000
*   RVNO,'N'              NO                                            27950000
  RVNTFY,*,1,CH         NOTIFY OWNER                                    28000000
*   RVYES,'Y'             YES                                           28050000
*   RVNO,'N'              NO                                            28100000
  RVOWNAC,*,1,CH        OWNER ACCESS                                    28150000
    RVRD,'R'              READ                                          28200000
    RVUPD,'U'             UPDATE                                        28250000
    RVADD,'A'             ADD                                           28300000
  RVUSERAC,*,1,CH       USER ACCESS                                     28350000
*   RVRD,'R'              READ                                          28400000
*   RVUPD,'U'             UPDATE                                        28450000
  RVVMUSE,*,1,CH        VM USE                                          28500000
*   RVYES,'Y'             YES                                           28550000
*   RVNO,'N'              NO                                            28600000
  RVMVSUSE,*,1,CH       MVS USE                                         28650000
*   RVYES,'Y'             YES                                           28700000
*   RVNO,'N'              NO                                            28750000
  RVNAME,*,8,CH         MEDIA NAME                                      28800000
    RVUNIT,=,8,CH       Old name for RVNAME field                       28850000
  RVRACK,*,6,CH         RACK NUMBER                                     28900000
  RVTRERR,*,4,CH        TEMPORARY READ ERRORS                           28950000
  RVTWERR,*,4,CH        TEMPORARY WRITE ERRORS                          29000000
  RVPRERR,*,4,CH        PERMANENT READ ERRORS                           29050000
  RVPWERR,*,4,CH        PERMANENT WRITE ERRORS                          29100000
**********************************************************************  29150000
* Product Information: Includes number, release and feature code     *  29200000
**********************************************************************  29250000
  RVPPNUM,*,8,CH        PROGRAM PRODUCT NUMBER                          29300000
  RVVER,*,6,CH          VERSION/RELEASE/MOD NUMBER                      29350000
  RVFEAT,*,4,CH         FEATURE CODE                                    29400000
  RVACCINF,*,40,CH      ACCOUNTING INFORMATION                          29450000
  RVUSEFLD,*,30,CH      USER DESCRIPTION                                29500000
  RVACCLST,*,3,CH       NUMBER OF ACCESS LIST ENTRIES                   29550000
  RVAUTIDS,*,96,CH      AUTHORISED USER IDS AREA                        29600000
  RVHLOC,*,8,CH         HOME LOCATION NAME                              29650000
  RVTRANS,*,1,CH        VOLUME IN TRANSIT                               29700000
*   RVYES,'Y'             YES                                           29750000
*   RVNO,'N'              NO                                            29800000
  RVLOCTYP,*,1,CH       LOCATION TYPE                                   29850000
    RVAUT,'A'             AUTO                                          29900000
    RVMAN,'M'             MANUAL                                        29950000
    RVSTR,'S'             STORE                                         30000000
    RVBLK,' '             BLANK                                         30050000
  RVDESTYP,*,1,CH       DESTINATION TYPE                                30100000
*   RVAUT,'A'             AUTO                                          30150000
*   RVMAN,'M'             MANUAL                                        30200000
*   RVSTR,'S'             STORE                                         30250000
*   RVBLK,' '             BLANK                                         30300000
  RVOLOC,*,8,CH         THE PREVIOUS LOCATION NAME                      30350000
  RVSGNAME,*,8,CH       STORAGE GROUP NAME                              30400000
  RVMEDREC,*,8,CH       VOLUME RECORDING FORMAT                         30450000
    RV18,'18TRACK'        18 TRACK                                      30500000
    RV36,'36TRACK'        36 TRACK                                      30550000
    RV128,'128TRACK'      128 TRACK                                     30600000
    RV256,'256TRACK'      256 TRACK                                     30650000
  RVMEDTY,*,8,CH        VOLUME MEDIA TYPE                               30700000
    RVAST,'*'              *                                            30750000
    RVCST,'CST'            CST                                          30800000
    RVEC,'ECCST'           ECCST                                        30850000
    RVHP,'HPCT'            HPCT                                         30900000
    RVEH,'EHPCT'           EHPCT                                        30950000
**********************************************************************  31000000
* EHPCT IS RESERVED FOR EXTENDED HIGH PERFORMANCE                    *  31050000
* CARTRIDGE TAPE.                                                    *  31100000
**********************************************************************  31150000
  RVMEDCMP,*,8,CH       COMPACTION TECHNIQUE                            31200000
*   RVAST,'*'              *                                            31250000
    RVNON,'NONE'           NONE                                         31300000
*   RVYES,'Y'              YES                                          31350000
  RVMEDATR,*,8,CH       SPECIAL ATTRIBUTES                              31400000
*   RVNON,'NONE'           NONE                                         31450000
    RVRDC,'RDCOMPAT'       RDCOMPAT                                     31500000
  RVDSNAM1,*,44,CH      FIRST FILE DATA SET NAME                        31550000
  RVMVMODE,*,1,CH       MOVE MODE                                       31600000
*   RVAUT,'A'             AUTO                                          31650000
*   RVMAN,'M'             MANUAL                                        31700000
  RVDSNREC,*,1,CH       DS RECORDING                                    31750000
*   RVYES,'Y'             YES                                           31800000
*   RVNO,'N'              NO                                            31850000
  RVALVERS,*,2,CH       ANSI LABLE VERSION                              31900000
    RVALCUR,=,1,CH        CURRENT LABEL VERSION                         31950000
    RVALREQ,*,1,CH        REQUIRED LABEL VERSION                        32000000
  RVBMEDN,*,8,CH        BIN MEDIA NAME                                  32050000
  RVOBMEDN,*,8,CH       PREVIOUS BIN MEDIA NAME                         32100000
  RVNLOC,*,8,CH         REQUIRED LOCATION NAME - AS DETERMINED BY       32150000
*                          VRS OR COMMAND                               32200000
  RVLUDEV,*,4,CH        LAST USED DRIVE                                 32250000
**********************************************************************  32300000
* Pending Actions:  The following fields list the actions required   *  32350000
*              for the volume.  See RVRETS for the actions set       *  32400000
*              when the volume is released.                          *  32450000
**********************************************************************  32500000
  RVACTION,*,8,CH       PENDING ACTIONS                                 32550000
    RVACTSCR,=,1,CH     RETURN TO SCRATCH                               32600000
*     RVYES,'Y'           YES                                           32650000
*     RVNO,'N'            NO                                            32700000
    RVACTREP,*,1,CH     REPLACE VOLUME                                  32750000
*     RVYES,'Y'           YES                                           32800000
*     RVNO,'N'            NO                                            32850000
    RVACTRET,*,1,CH     RETURN TO OWNER                                 32900000
*     RVYES,'Y'           YES                                           32950000
*     RVNO,'N'            NO                                            33000000
    RVACTINI,*,1,CH     INITIALIZE                                      33050000
*     RVYES,'Y'           YES                                           33100000
*     RVNO,'N'            NO                                            33150000
    RVACTERA,*,1,CH     ERASE                                           33200000
*     RVYES,'Y'           YES                                           33250000
*     RVNO,'N'            NO                                            33300000
    RVACTNOT,*,1,CH     NOTIFY                                          33350000
*     RVYES,'Y'           YES                                           33400000
*     RVNO,'N'            NO                                            33450000
    SKIP,2              RESERVED                                        33500000
  RVABEND,*,1,CH        DATA SET CLOSED BY ABEND                        33550000
*   RVYES,'Y'             YES                                           33600000
*   RVNO,'N'              NO                                            33650000
  RVHOMTYP,*,1,Ch       HOME LOCATION TYPE                              33700000
*   RVAUT,'A'             AUTO                                          33750000
*   RVMAN,'M'             MANUAL                                        33800000
*   RVBLK,' '             BLANK                                         33850000
  RVNEXTYP,*,1,CH       NEXT LOCATION TYPE                              33900000
*   RVAUT,'A'             AUTO                                          33950000
*   RVMAN,'M'             MANUAL                                        34000000
*   RVSTR,'S'             STORE                                         34050000
*   RVBLK,' '             BLANK                                         34100000
  RVVOLTYPE,*,1,CH      VOLUME TYPE                                     34150000
    MVVOLTYPE_PHYSICAL,'0' VOLUME TYPE PHYSICAL                         34200000
    MVVOLTYPE_LOGICAL,'1'  VOLUME TYPE LOGICAL                          34250000
    MVVOLTYPE_STACKED,'2'  VOLUME TYPE STACKED                          34300000
  RVVRSREL,*,8,CH       VRS RELEASE OPTIONS                             34350000
    RVRELIXD,=,1,CH     IGNORE EXPDT                                    34400000
*     RVYES,'Y'           YES                                           34450000
*     RVNO,'N'            NO                                            34500000
    RVRELSI,*,1,CH      SCRATCH IMMEDIATE                               34550000
*     RVYES,'Y'           YES                                           34600000
*     RVNO,'N'            NO                                            34650000
    SKIP,6              RESERVED                                        34700000
  RVCONTNR,*,16,CH      IN CONTAINER NAME                               34750000
  RVRQPRTY,*,4,CH       MOVEMENT PRIORITY                               34800000
**********************************************************************  35300000
* END OF REPORT EXTRACT VOLUME RECORD                                *  35350000
**********************************************************************  35400000
RVRCEND,*               END OF RVEXT                                    35450000
**********************************************************************  35500000
* END OF REPORT EXTRACT RECORD                                       *  35550000
**********************************************************************  35600000
